home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1985 February / 1985-02.d64 / line cross ref_6 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  2KB  |  65 lines
  1. 90 print"[147]line cross reference utility"
  2. 95 print"          loading";
  3. 100 ct=0
  4. 110 fori=1to476
  5. 120 reada
  6. 130 ct=ct+a
  7. 140 ifint(i/20)<>(i/20)then180
  8. 150 readq:print".";
  9. 160 ifq=ctthenct=0:goto180
  10. 170 print"error in data - lines"200+i"to"210+i:ct=0:goto210
  11. 180 poke49151+i,a
  12. 190 next
  13. 200 readq:ifq<>ctthen170
  14. 205 print"[147]type 'sys 49515' to list to the":print"printer."
  15. 206 print"type 'sys 49518' to list to the":print"screen."
  16. 210 end
  17. 220 data 13,76,73,78,69,32,78,85,77,66
  18. 230 data 69,82,32,67,82,79,83,83,32,82,1338
  19. 240 data 69,70,69,82,69,78,67,69,58,13
  20. 250 data 0,13,32,32,76,73,78,69,32,32,1081
  21. 260 data 32,32,82,69,70,69,82,69,78,67
  22. 270 data 69,68,32,65,84,13,0,13,76,73,1143
  23. 280 data 83,84,73,78,71,32,67,79,77,80
  24. 290 data 76,69,84,69,46,13,0,13,32,32,1158
  25. 300 data 32,32,32,32,32,32,0,32,231,255
  26. 310 data 169,0,32,189,255,169,4,162,4,160,1854
  27. 320 data 7,32,186,255,32,192,255,162,4,32
  28. 330 data 201,255,96,169,32,32,210,255,192,40,2639
  29. 340 data 176,44,192,39,208,4,224,16,176,36
  30. 350 data 32,210,255,192,4,176,29,192,3,208,2416
  31. 360 data 4,224,232,176,21,32,210,255,192,0
  32. 370 data 208,14,224,100,176,10,32,210,255,224,2799
  33. 380 data 10,176,3,32,210,255,152,32,205,189
  34. 390 data 96,169,0,133,9,169,10,133,42,165,2190
  35. 400 data 122,166,123,133,2,134,3,165,43,166
  36. 410 data 44,133,40,134,41,133,122,134,123,160,2121
  37. 420 data 0,177,40,208,14,200,177,40,208,9
  38. 430 data 165,2,166,3,133,122,134,123,96,160,2177
  39. 440 data 2,177,40,133,57,200,177,40,133,58
  40. 450 data 166,41,165,40,24,105,3,144,1,232,1938
  41. 460 data 133,122,134,123,32,115,0,201,0,240
  42. 470 data 4,201,143,208,11,160,1,177,40,170,2215
  43. 480 data 136,177,40,76,191,192,201,137,240,8
  44. 490 data 201,141,240,4,201,167,208,222,32,115,2929
  45. 500 data 0,32,243,188,32,155,188,165,101,197
  46. 510 data 59,208,60,165,100,197,60,208,54,36,2448
  47. 520 data 9,48,28,169,128,133,9,169,13,32
  48. 530 data 210,255,166,59,164,60,32,113,192,169,2158
  49. 540 data 32,32,210,255,32,210,255,169,11,133
  50. 550 data 42,198,42,208,11,169,77,160,192,32,2470
  51. 560 data 30,171,169,10,133,42,166,57,164,58
  52. 570 data 32,113,192,32,121,0,201,44,208,143,2086
  53. 580 data 76,22,193,32,87,192,169,147,32,210
  54. 590 data 255,24,162,5,160,1,32,240,255,169,2463
  55. 600 data 0,160,192,32,30,171,162,28,169,61
  56. 610 data 32,210,255,202,208,250,24,162,7,160,2515
  57. 620 data 1,32,240,255,169,31,160,192,32,30
  58. 630 data 171,169,17,32,210,255,165,43,166,44,2414
  59. 640 data 133,38,134,39,160,0,177,38,208,5
  60. 650 data 200,177,38,240,30,160,2,177,38,133,2127
  61. 660 data 59,200,177,38,133,60,32,171,192,160
  62. 670 data 0,177,38,72,200,177,38,133,39,104,2200
  63. 680 data 133,38,76,168,193,169,57,160,192,32
  64. 690 data 30,171,32,204,255,96,2006
  65.